home *** CD-ROM | disk | FTP | other *** search
/ DOpus Plus / DOpus Plus.iso / Themes / Windows-Converted / Movies / Spawn.Theme < prev    next >
Text File  |  1998-10-26  |  3KB  |  54 lines
  1. /* D5THEME
  2.  
  3.    Spawn.Theme
  4.  
  5.    Directory Opus Magellan II Theme File
  6. */
  7.  
  8. parse arg dopus_port apply_flags
  9. if dopus_port='' then
  10.     dopus_port='DOPUS.1'
  11. address value dopus_port
  12.  
  13. if apply_flags='' then
  14.     apply_flags='PFBS'
  15. else
  16.     apply_flags=upper(apply_flags)
  17.  
  18. options results
  19. options failat 21
  20.  
  21. /* Set background pictures */
  22. if index( apply_flags , "B") ~= 0 then do
  23.     dopus  set  background on
  24.     dopus  set  background "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Wallpaper3.jpg'" desktop center precision exact
  25.     dopus clear background lister
  26.     dopus clear background req
  27. end
  28.  
  29. /* Set sound events */
  30. if index( apply_flags , "S") ~= 0 then do
  31.     dopus  set  sound "'Bad disk inserted'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Empty Recycle Bin.wav'" 64
  32.     dopus  set  sound "'Startup'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Start Windows.wav'" 64
  33.     dopus  set  sound "'Shutdown'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Exit Windows.wav'" 64
  34.     dopus  set  sound "'Hide'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Exclamation.wav'" 64
  35.     dopus  set  sound "'Reveal'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Default Sound.wav'" 64
  36.     dopus  set  sound "'Disk inserted'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Question.wav'" 64
  37.     dopus  set  sound "'Disk removed'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/System Default.wav'" 64
  38.     dopus  set  sound "'Open lister'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Maximize.wav'" 64
  39.     dopus  set  sound "'Open buttons'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Menu Popup.wav'" 64
  40.     dopus  set  sound "'Open group'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Menu Command.wav'" 64
  41.     dopus  set  sound "'Close lister'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Minimize.wav'" 64
  42.     dopus  set  sound "'Close buttons'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Asterisk.wav'" 64
  43.     dopus  set  sound "'Close group'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Critical Stop.wav'" 64
  44.     dopus clear sound "'FTP close connection'"
  45.     dopus  set  sound "'FTP connect fail'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Minimize.wav'" 64
  46.     dopus  set  sound "'FTP connect success'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Maximize.wav'" 64
  47.     dopus  set  sound "'FTP copy fail'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Program Error.wav'" 64
  48.     dopus  set  sound "'FTP copy success'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Default Sound.wav'" 64
  49.     dopus  set  sound "'FTP error'" "'DOPLUS:Themes/Windows/Movies/Spawn/Spawn/Asterisk.wav'" 64
  50. end
  51.  
  52. /* Refresh Opus */
  53. dopus refresh all
  54.